www.gusucode.com > 红色大方的企业网站源码 1 > 红色大方的企业网站源码 1.0/qiye_red/editor_InsertFlash.asp
<%@language=vbscript codepage=936 %> <% option explicit response.buffer=true '强制浏览器重新访问服务器下载页面,而不是从缓存读取页面 Response.Buffer = True Response.Expires = -1 Response.ExpiresAbsolute = Now() - 1 Response.Expires = 0 Response.CacheControl = "no-cache" %> <HTML> <HEAD> <TITLE>插入FLASH文件</TITLE> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <link rel="stylesheet" type="text/css" href="editor_dialog.css"> <script language="JavaScript"> function OK(){ var str1=""; var strurl=document.form1.url.value; if (strurl==""||strurl=="http://") { alert("请先输入FLASH文件地址,或者上传FLASH文件!"); document.form1.url.focus(); return false; } else { str1="<object classid='clsid:D27CDB6E-AE6D-11cf-96B8-444553540000' codebase='http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0' width="+document.form1.width.value+" height="+document.form1.height.value+"><param name=movie value="+document.form1.url.value+"><param name=quality value=high><embed src="+document.form1.url.value+" pluginspage='http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash' type='application/x-shockwave-flash' width="+document.form1.width.value+" height="+document.form1.height.value+"></embed></object>" window.returnValue = str1+"$$$"+document.form1.UpFileName.value; window.close(); } } function IsDigit() { return ((event.keyCode >= 48) && (event.keyCode <= 57)); } </script> </head> <BODY bgColor=menu topmargin=15 leftmargin=15 > <form name="form1" method="post" action=""> <table width=100% border="0" cellpadding="0" cellspacing="2"> <tr><td> <FIELDSET align=left> <LEGEND align=left>FLASH动画参数</LEGEND> <TABLE border="0" cellpadding="0" cellspacing="3" > <TR><TD height="17" >地址:<INPUT name="url" id=url value="http://" size=40> <%if trim(session("AdminName"))<>"" then%> <input type="button" name="Submit" value="..." title="从已上传文件中选择" onClick="javascript:window.open('editor_SelectUpFile.asp?DialogType=flash', 'selupfile', 'width=800, height=600, toolbar=no, menubar=no, scrollbars=yes, resizable=no, location=no, status=yes');"> <%end if%> </td></TR> <TR><TD >宽度:<INPUT name="width" id=width ONKEYPRESS="event.returnValue=IsDigit();" value=500 size=7 maxlength="4"> 高度:<INPUT name="height" id=height ONKEYPRESS="event.returnValue=IsDigit();" value=300 size=7 maxlength="4"></TD></TR> </TABLE></fieldset></td><td width=80 align="center"><input name="cmdOK" type="button" id="cmdOK" value=" 确定 " onClick="OK();"> <br> <br><input name="cmdCancel" type=button id="cmdCancel" onclick="window.close();" value=' 取消 '></td></tr> <tr> <td> <FIELDSET align=left> <LEGEND align=left>上传本地FLASH文件</LEGEND> <iframe class="TBGen" style="top:2px" ID="UploadFiles" src="upload_dialog.asp?DialogType=flash" frameborder=0 scrolling=no width="350" height="25"></iframe> </fieldset> </td> <td width=80 align="center" valign="top"><input name="UpFileName" type="hidden" id="UpFileName" value="None"></td> </tr> </table> </form> </body> </html>